home *** CD-ROM | disk | FTP | other *** search
/ Language/OS - Multiplatform Resource Library / LANGUAGE OS.iso / txl / modula2.lha / Modula2 / Modula2.Txl < prev   
Text File  |  1993-07-19  |  329b  |  13 lines
  1. % Test of TXL Modula 2 Grammar
  2. % Takes as input Modula 2 programs and outputs pretty-printed ones.
  3.  
  4. include "Modula2.Grammar"
  5.  
  6. % Dummy rule that should do nothing to any real program.
  7. rule mainRule
  8.     replace [statement]
  9.     ANYTHING__NOT__IN__A__PROGRAM_____ := 999
  10.     by
  11.     ANYTHING__NOT__IN__A__PROGRAM_____ := 1000 - 1
  12. end rule
  13.